/*
Thanks to Dave F
by Jay Protopapas
philodoh(at)aol.com
*/

A0="sqr( pi + trnc( rnd( pi ) ) )",  
Aspc=1,


srcR="r - 0.0314 * exp( cos(theta* a0 ) ) ",
srcT="theta - 0.0314 * sgn( sin(-r * a0 ) * -1.257  ) ",
Vers=100